home *** CD-ROM | disk | FTP | other *** search
- #define NAME "testCurrentTime"
- #define REVISION "1"
-
- /* Programmheader
-
- Name: testCurrentTime
- Author: SDI
- Distribution: PD
- Description: tests CurrentTime function
- Compileropts: -gM
- Linkeropts: -l amiga
-
- 1.1 06.12.96 : added header
- */
-
- #include <pragma/intuition_lib.h>
- #include <pragma/exec_lib.h>
- #include <pragma/dos_lib.h>
- #include "SDI_defines.h"
-
- ULONG DosVersion = 37;
- struct Library *IntuitionBase = 0;
-
- void main(void)
- {
- ULONG sec, usec, sec0, usec0, tim;
-
- if((IntuitionBase = OpenLibrary("intuition.library",33)))
- {
- CurrentTime(&sec0, &usec0);
- Printf("%lu %lu\n",sec0,usec0);
-
- while(!CTRL_C)
- {
- CurrentTime(&sec, &usec);
- if(usec >= usec0)
- {
- sec = sec - sec0;
- usec = usec - usec0;
- }
- else
- {
- sec = sec - sec0 - 1;
- usec = usec + 1000000 - usec0;
- }
- tim = (sec<<7) + usec / (1000000>>7);
-
- Printf("%lu %lu %lu\n", sec, usec, tim);
- }
- CloseLibrary(IntuitionBase);
- }
- exit(0);
- }
-